* comint.el (comint-prompt-regexp): Double the backslashes in the

	sample prompt regexps, so that they print properly when unquoted.

diff --git a/lisp/comint.el b/lisp/comint.el
index e494e706195cf8e1789e785bedeb3ec9044e39ad..db45520f597a3c825cafa7bc74b27378973f54bc 100644 (file)
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -128,8 +128,8 @@ Defaults to \"^\", the null string at BOL.
 
 Good choices:
   Canonical Lisp: \"^[^> ]*>+:? *\" (Lucid, franz, kcl, T, cscheme, oaklisp)
-  Lucid Common Lisp: \"^\\(>\\|\\(->\\)+\\) *\"
-  franz: \"^\\(->\\|<[0-9]*>:\\) *\"
+  Lucid Common Lisp: \"^\\\\(>\\\\|\\\\(->\\\\)+\\\\) *\"
+  franz: \"^\\\\(->\\\\|<[0-9]*>:\\\\) *\"
   kcl: \"^>+ *\"
   shell: \"^[^#$%>]*[#$%>] *\"
   T: \"^>+ *\"